home *** CD-ROM | disk | FTP | other *** search
/ MacHome 2001 June / MacHome Magazine Demo Disc June 2001.iso / Stuff / Software / Audio / MacAmp™ 2.0.1 / Entheogen 1.1 / Third Party Plugins / WhiteCap 3.4! / (into Entheogen Plugins Folder) / WhiteCap Configs / Lygax Tornado < prev    next >
Encoding:
Text File  |  1999-10-10  |  923 b   |  59 lines  |  [TEXT/ttxt]
  1. //Whirling Thingo!  Kinda Tornado-ish(?)
  2. //Written by Lygax, 1999
  3. //Sorry about the messyness, but this was the best way i found!
  4. Resn=20,
  5.  
  6. Durn="2",
  7.  
  8.  
  9. CamX="-70 * sin( t) ",
  10. CamY="70 * cos( t) ",
  11. CamZ="110 + 40*cos(t/8) ",
  12.  
  13. CmLX="0",
  14. CmLY="0",
  15. CmLZ="100",
  16.  
  17. CUpX="0",
  18. CUpY="0",
  19. CUpZ="1",
  20.  
  21.  
  22. C0=".1 + .5*(1-dt)",
  23. D0="( 1 - pos( s ) )",
  24.  
  25. R="c0 + .6*d0*sin(t/2)",
  26. G="c0 + .6*d0*sin(t/3)",
  27. B="c0 + .6*d0*sin(t/5)",
  28.  
  29.  
  30. //BckR=".1",BckG=".2",BckB=".6",
  31.  
  32.  
  33. widt=200,heig=450,
  34.  
  35.  
  36. ConL=0,ConB=0,
  37. LWdt="2*dt+1",
  38.  
  39.  
  40. Fall="1",
  41. A0="trnc( rnd( 4 ) + 2) ",//number of turns in the spiral ("3" default)
  42.  
  43. D1="D0 * a0 * 6.283185307",
  44. C1="25*sin((1-dt)*5) + 25*cos(t/5) - 10 * dt",
  45. C2="25*cos((1-dt)*5) + 20*sin(t/6) - 10 * dt",
  46. C3="dt * 20 + 30",
  47.  
  48. X="d0 + dt*(s *50 * cos( d1 ) + c1 + abs(mag(s)) * c3)",
  49. Y="d0 + dt*(s *50 * sin( d1 ) + c2 + abs(mag(s)) * c3)",
  50. Z="dt*200*dt+pos(s)*20+abs(mag(s))*20",
  51.  
  52.  
  53. Scal="350",
  54. ScSz=1,
  55. Pers="150",
  56.  
  57.  
  58. Vers=30
  59.